home *** CD-ROM | disk | FTP | other *** search
/ 64'er Special 7 / 64er_Magazin_Sonderheft_07_86-07_1986_Markt__Technik_de_Side_A.d64 / listing 5 basic (.txt) < prev    next >
Commodore BASIC  |  2022-10-26  |  128b  |  5 lines
  1. 0 rem **** startzeile ****
  2. 1000 input a$:if a$=""then end
  3. 1010 for aa=0 to len(a$)-1:poke 513+aa,asc(mid$(a$,aa+1,1)):next:poke 513+aa,0
  4. 1020 poke 11,aa:sys 830
  5.